home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / FQUIT.DIR / 00038_Script_38 < prev    next >
Text File  |  1995-09-06  |  974b  |  49 lines
  1. global gOBtn1, gOBtn2, gNewMarker, gWhatMovie, ogame, ogameControl, ogamelast
  2.  
  3. on SetUpQuitButtons  
  4.   set gOBtn1 = birth(script "a2StateButton", 10, 15, "FeatureButSplClk.AIFF", "Resume", "HandCursor")
  5.   set gOBtn2 = birth(script "a2StateButton", 11, 17, "FeatureButSplClk.AIFF", "FinalQuit", "HandCursor")
  6. end
  7.  
  8. on QuitRollovers
  9.   if objectP(gOBtn1) then
  10.     Hilight(gOBtn1)
  11.   end if
  12.   if objectP(gOBtn2) then
  13.     Hilight(gOBtn2)
  14.   end if
  15. end
  16.  
  17. on KillQuitButtons
  18.   if objectP(gOBtn1) then
  19.     hidecontrol(gOBtn1)
  20.     set gOBtn1 = 0
  21.   end if
  22.   if objectP(gOBtn2) then
  23.     hidecontrol(gOBtn2)
  24.     set gOBtn2 = 0
  25.   end if
  26. end
  27.  
  28. on Resume
  29.   turnoffpuppets
  30.   go frame gNewMarker of movie gWhatMovie
  31.   abort
  32. end
  33.  
  34. on FinalQuit
  35.   KillQuestion
  36.   if objectP(ogame) then
  37.     set oGame = 0
  38.   end if
  39.   if objectP(ogameControl) then
  40.     set ogameControl = 0
  41.   end if
  42.   if objectP(ogamelast) then
  43.     set ogamelast = 0
  44.   end if
  45.   quit
  46. end
  47.  
  48.  
  49.